* net/tramp.el: Revert previous patch. `last-command-char' is
authorMichael Albinus <michael.albinus@gmx.de>
Fri, 9 Jan 2009 08:13:44 +0000 (08:13 +0000)
committerMichael Albinus <michael.albinus@gmx.de>
Fri, 9 Jan 2009 08:13:44 +0000 (08:13 +0000)
used in code used only for XEmacs, where it is different from
`last-command-event'.

lisp/net/tramp.el

index dbd34b763598af23146545a3861d64f621a2fc7a..b226f22ad98475ade1871e6fcffb1088e9c40f4c 100644 (file)
@@ -3738,10 +3738,10 @@ beginning of local filename are not substituted."
              ;; We don't need to handle `last-input-event', because
              ;; due to the key map we know it must be ?/ or ?~.
              (let ((s (concat (buffer-substring (point-min) (point))
-                              (string last-command-event))))
+                              (string last-command-char))))
                (delete-region (point-min) (point))
                (insert (substitute-in-file-name s))
-               (setq ad-return-value last-command-event))
+               (setq ad-return-value last-command-char))
            ad-do-it))))
 
    '(minibuffer-electric-separator